let foo =
  entry.logdata.value_end :=
    entry.logdata.value_end - !remove_size + testtesttest ;
  entry.logdata.value_end :=
    (entry.logdata.value_end - !remove_size + testtesttest) [@foo] ;
  (* foooooooooo *)
  entry.logdata.value_end :=
    (entry.logdata.value_end - !remove_size + testtesttest) [@foo]
  (* foooooooooooo *) ;
  entry.logdata.value_end :=
    entry.logdata.value_end - !remove_size + testtesttest
  (* fooooooooooooooooooooooooo *) ;
  value_end :=
    entry.logdata.value_end - !remove_size + testtesttesttesttesttesttest ;
  value_end :=
    ( entry.logdata.value_end - !remove_size + testtesttesttesttesttesttest
    ) [@foo] ;
  value_end :=
    ( entry.logdata.value_end - !remove_size + testtesttesttesttesttesttest
    ) [@foo]
  (* fooooooooooooo *) ;
  (* foooooooooooooooooooo *)
  value_end :=
    entry.logdata.value_end - !remove_size + testtesttesttesttesttesttest
  (* foooooooo *) ;
  foo

let _ =
  r (* _________________________________________________________________ *) := 1
;;

let _ =
  r (* _________________________________________________________________ *) (* _________________________________________________________________ *) := 1
;;

let _ =
  r := (* _________________________________________________________________ *) 1
;;

let _ =
  r := (* _________________________________________________________________ *) (* _________________________________________________________________ *) 1
;;

let _ =
  r (* _________________________________________________________________ *) := (* _________________________________________________________________ *) 1
;;

let _ =
  r (* _________________________________________________________________ *) (* _________________________________________________________________ *) := (* _________________________________________________________________ *) (* _________________________________________________________________ *) 1
;;
